home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Present…ry 5: (Reseller Edition) / Apple Reference & Presentations Library 5.0 (Reseller Edition).iso / 6-Developer Demos / Developer Demos-Gen. / Mac Yellow Pages 1.0 / card_28685.txt < prev    next >
Text File  |  1990-08-17  |  1KB  |  65 lines
  1. -- card: 28685 from stack: in.0
  2. -- bmap block id: 0
  3. -- flags: 4000
  4. -- background id: 27953
  5. -- name: Last Page
  6. ----- HyperTalk script -----
  7. on arrowKey buttonPressed
  8.   if buttonPressed is "left" then
  9.     go to prev card
  10.   else if buttonPressed is "up" then
  11.     go to card "First Page"
  12.   else
  13.     beep
  14.   end if
  15. end arrowKey
  16.  
  17. on doMenu action
  18.   if action is "Prev" then
  19.     go to prev card
  20.   else if action is "Next" then
  21.     -- do nothing
  22.   else if action is "First" then
  23.     go to card "First Page"
  24.   else if action is "Last" then
  25.     -- do nothing
  26.   else
  27.     pass doMenu
  28.   end if
  29. end doMenu
  30.  
  31.  
  32. -- part 3 (field)
  33. -- low flags: 01
  34. -- high flags: 0001
  35. -- rect: left=1 top=27 right=297 bottom=511
  36. -- title width / last selected line: 0
  37. -- icon id / first selected line: 0 / 0
  38. -- text alignment: 1
  39. -- font id: 0
  40. -- text size: 12
  41. -- style flags: 0
  42. -- line height: 16
  43. -- part name: 
  44.  
  45.  
  46. -- part contents for background part 5
  47. ----- text -----
  48. Page 308
  49.  
  50. -- part contents for card part 3
  51. ----- text -----
  52.  
  53.  
  54.  
  55.  
  56.  
  57.  
  58. The End
  59.  
  60.  
  61.  
  62.  
  63.  
  64. Thank You for Using the
  65. Macintosh Yellow Pages